#INCLUDE "PROTHEUS.CH"

User Function fNumberDoc     
	cNFiscal := StrZero(Val(cNFiscal),9)
Return .T.